﻿
Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim xml = <?xml version="1.0" encoding="UTF-8"?>
                  <SnomIPPhoneText>
                      <Title>Snom Twitter client</Title>
                      <Prompt>Prompt</Prompt>
                      <Text>
                          Welcome to the<br/> Snom Twitter client,<br/>
                          developped by Régis Scyeur<br/>
                          for the Snom Xml Championship<br/>
                          More(info) : regis@scyeur.net
                          http://snomtwitter.codeplex.com
                    </Text>
                      <SoftKeyItem>
                          <Name>ENTER</Name>
                          <Label>Ok</Label>
                          <URL><%= Helper.TweetSearchUrl(Page, "") %></URL>
                      </SoftKeyItem>
                  </SnomIPPhoneText>
        Response.ContentType = "text/xml"
        Response.Write(xml)
        Response.End()



    End Sub
End Class
